home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 July & August
/
Pcwk78a98.iso
/
Sharewar
/
Organise
/
_SETUP.1
/
Epoch Organiser 3.0.exe
/
0
/
RCDATA
/
TALARMFORM
/
TALARMFORM.txt
Wrap
Text File
|
1998-01-25
|
13KB
|
385 lines
object AlarmForm: TAlarmForm
Left = 81
Top = 74
BorderStyle = bsDialog
Caption = 'Alarm/Reminder System'
ClientHeight = 260
ClientWidth = 426
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object GroupBox1: TGroupBox
Left = 2
Top = 1
Width = 206
Height = 189
Caption = 'Alarms/Reminders'
TabOrder = 0
object ListBox: TListBox
Left = 5
Top = 15
Width = 195
Height = 168
ItemHeight = 13
TabOrder = 0
OnClick = ListBoxClick
end
end
object GroupBox2: TGroupBox
Left = 212
Top = 1
Width = 213
Height = 256
Caption = 'Alarm/Reminder Settings'
TabOrder = 1
object Label1: TLabel
Left = 7
Top = 20
Width = 102
Height = 13
Caption = 'Alarm/Reminder Date'
end
object Label3: TLabel
Left = 110
Top = 49
Width = 26
Height = 13
Caption = 'Alm 2'
end
object Bevel1: TBevel
Left = 6
Top = 41
Width = 202
Height = 2
end
object Bevel2: TBevel
Left = 6
Top = 70
Width = 202
Height = 2
end
object Label4: TLabel
Left = 6
Top = 79
Width = 20
Height = 13
Caption = 'Title'
end
object Label2: TLabel
Left = 7
Top = 49
Width = 26
Height = 13
Caption = 'Alm 1'
end
object Datebtn: TButton
Left = 133
Top = 18
Width = 75
Height = 19
TabOrder = 0
OnClick = DatebtnClick
end
object Alarm1btn: TButton
Left = 35
Top = 47
Width = 45
Height = 19
TabOrder = 1
OnClick = Alarm1btnClick
end
object Alarm2btn: TButton
Left = 140
Top = 47
Width = 46
Height = 19
TabOrder = 2
OnClick = Alarm2btnClick
end
object TitleEdit: TEdit
Left = 32
Top = 76
Width = 176
Height = 21
TabOrder = 3
OnChange = TitleEditChange
end
object GroupBox3: TGroupBox
Left = 7
Top = 100
Width = 201
Height = 122
Caption = 'Main Text'
TabOrder = 4
object TextMemo: TMemo
Left = 5
Top = 15
Width = 191
Height = 100
ScrollBars = ssVertical
TabOrder = 0
OnChange = TitleEditChange
end
end
object WaveEdit: TEdit
Left = 54
Top = 226
Width = 132
Height = 21
Hint = 'Sound File To Play. Default = SystemStart'
ParentShowHint = False
ReadOnly = True
ShowHint = True
TabOrder = 5
OnChange = TitleEditChange
end
object Wavebtn: TBitBtn
Left = 8
Top = 226
Width = 23
Height = 21
Hint = 'Play Sound'
ParentShowHint = False
ShowHint = True
TabOrder = 6
OnClick = WavebtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
NumGlyphs = 2
end
object BitBtn3: TBitBtn
Left = 32
Top = 226
Width = 23
Height = 21
Hint = 'Load Sound File [.Wav]'
ParentShowHint = False
ShowHint = True
TabOrder = 7
OnClick = BitBtn3Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
70E337F33333333337F3E0F33333333370E337F3333FFF3337F3E0F337000733
70E337F333777FF337F3E0F33000003370E337F3377777F337F3E0F330000033
70E337F3377777F337F3E0F33000003370E337F33777773337F3E0F337000733
70E337F33377733337F3E0F33333333370E337F33333333337F3E0F333333333
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
NumGlyphs = 2
end
object BitBtn4: TBitBtn
Left = 186
Top = 47
Width = 22
Height = 19
Hint = 'Erase Alarm 2'
ParentShowHint = False
ShowHint = True
TabOrder = 8
OnClick = BitBtn4Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F5555000555555505555577755555557555}
NumGlyphs = 2
end
object BitBtn5: TBitBtn
Left = 80
Top = 47
Width = 22
Height = 19
Hint = 'Erase Alarm 1'
ParentShowHint = False
ShowHint = True
TabOrder = 9
OnClick = BitBtn5Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F5555000555555505555577755555557555}
NumGlyphs = 2
end
object BitBtn6: TBitBtn
Left = 186
Top = 226
Width = 22
Height = 21
Hint = 'Erase Sound File'
ParentShowHint = False
ShowHint = True
TabOrder = 10
OnClick = BitBtn6Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F5555000555555505555577755555557555}
NumGlyphs = 2
end
end
object NewAlmbtn: TBitBtn
Left = 3
Top = 194
Width = 86
Height = 22
Caption = 'New Alarm'
TabOrder = 2
OnClick = NewAlmbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
0333337733F733F77F33370980FFF08907333373373F373373F33099FF0FFFF9
903337F3F373F33FF7F33090FFF0FF00903337F73337F37737F33099FFF0FFF9
9033373F33F7F3F33733370980F0F0890733337FF737F7337F33330098F0F890
03333F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
77037F3377777773337F088887707888870373F3337773F33373307880707088
7033373FF737F73FF733337003303300733333777337FF777333333333000333
3333333333777333333333333333333333333333333333333333}
NumGlyphs = 2
end
object Okbtn: TBitBtn
Left = 3
Top = 233
Width = 55
Height = 24
TabOrder = 3
OnClick = OkbtnClick
Kind = bkOK
end
object BitBtn1: TBitBtn
Left = 63
Top = 233
Width = 62
Height = 24
Cancel = True
Caption = '&Close'
ModalResult = 2
TabOrder = 4
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object BitBtn2: TBitBtn
Left = 147
Top = 233
Width = 62
Height = 24
TabOrder = 5
OnClick = BitBtn2Click
Kind = bkHelp
end
object Deletebtn: TBitBtn
Left = 89
Top = 194
Width = 61
Height = 22
Caption = 'Delete'
TabOrder = 6
OnClick = DeletebtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333FF33333333333330003333333333333777333333333333
300033FFFFFF3333377739999993333333333777777F3333333F399999933333
3300377777733333337733333333333333003333333333333377333333333333
3333333333333333333F333333333333330033333F33333333773333C3333333
330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
333333377F33333333FF3333C333333330003333733333333777333333333333
3000333333333333377733333333333333333333333333333333}
NumGlyphs = 2
end
object Allbtn: TBitBtn
Left = 150
Top = 194
Width = 58
Height = 22
Caption = 'All'
TabOrder = 7
OnClick = AllbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
55555FFFFFFF5F55FFF5777777757559995777777775755777F7555555555550
305555555555FF57F7F555555550055BB0555555555775F777F55555550FB000
005555555575577777F5555550FB0BF0F05555555755755757F555550FBFBF0F
B05555557F55557557F555550BFBF0FB005555557F55575577F555500FBFBFB0
B05555577F555557F7F5550E0BFBFB00B055557575F55577F7F550EEE0BFB0B0
B05557FF575F5757F7F5000EEE0BFBF0B055777FF575FFF7F7F50000EEE00000
B0557777FF577777F7F500000E055550805577777F7555575755500000555555
05555777775555557F5555000555555505555577755555557555}
NumGlyphs = 2
end
end